home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / ds40bpds.zip / COMPRESS.ZIP / COMPRESS.BAS (.txt) next >
QuickBASIC Tokenized Source  |  1991-02-24  |  9KB  |  272 lines
  1. CompressHighScoresx
  2. FileNameH
  3. DaysAgol
  4.     HIGHSCORE
  5. FileNum
  6. FileOpen`
  7. Numberf
  8. Number.Of.Scoresq
  9. WorkNum2
  10.     DeleteDay
  11. ConvertJulian
  12. Year-
  13.     RemainderT
  14. Remainder1;
  15. Remainder2
  16.     Remainer2/
  17. Month
  18. UserNamea
  19. ScoreF
  20. DateUpdatedp
  21. Access
  22. Sharing
  23. ExitDOORSYS
  24. ExitRBBS
  25. ExitWildT
  26. InitWild
  27. InitDOORSYS!
  28. InitRBBSE
  29. CheckTimeLeft
  30. CheckCarrier
  31. CarrierFlag
  32. EchoChr
  33. ExtendedCode
  34. WaitForEndSendW
  35. @    BackSpace
  36. BeepSpeaker
  37. CalcSpacesW
  38. SpacesNeeded
  39. GetPort
  40. CheckInBuffer_
  41. CharsWaiting
  42. OpenPortu
  43. PutPort
  44. ScrClr
  45. ClrNu
  46. How.Many.Times
  47. Bell>
  48. Enter"
  49. ColorUse<
  50. IncommD
  51.     SendEnter
  52. LimitField
  53. AllTrun
  54. @    ANSIMusic
  55. Music
  56. BackSpaceOverb
  57. Center    
  58. ChkKeyboard
  59. ClrScrn
  60. @    ColorEasy
  61.     DayOfWeek
  62. DoorBusy
  63. ErrorLevelSetv
  64. Error/
  65. Error.Level
  66. ExitDoor
  67. @    ExitPCB12
  68. @    ExitPCB14F
  69.     FileExist
  70. FileM
  71. File.Name.Check
  72. GetTime
  73. Hours
  74. Minutes
  75. Seconds}
  76. SinceMid
  77. HighScores
  78. PROGNAME
  79. InitDoor
  80. @    InitPCB12
  81. @    InitPCB14
  82. MenuManager
  83. Menur
  84. CenterItC
  85. TextClr
  86. How.Many.Bars
  87. Select
  88. Slct(
  89.     Barnumber_
  90. MoveCursorZ
  91. Parser
  92.     Searchfor/
  93. Searchin,
  94. ParArrayN
  95. ERRCODEz
  96. RandNum
  97. @    ReadUsers5
  98. ReadUsersSys4
  99. @    ScriptCMD`
  100. @    ScrUpdate
  101. Sorterl
  102. HowManyToSort
  103. @    SysopPage
  104. TimeConvert9
  105. TimeCredit
  106. @    Translate
  107. ViewFile
  108. ChkIt;
  109. MoreP
  110. ExitP
  111. WaitASec    
  112. How.Long.To.Wait
  113. Windows
  114. TTFOREl    
  115. TTBACK
  116. BORDER
  117. SHADOW
  118. Text2
  119. WriteUsersB
  120. SYSDPATH
  121. BBSName
  122. SysopNM
  123. CALLNAME
  124. TIMELEFTn
  125. CommPort,    
  126. RELEASEt
  127. FIRST
  128. Lastg
  129. ANSIW
  130. Out.Of.Time
  131. Inversez
  132. Screen0
  133. Screen.ToggleJ
  134.     Clr.Array
  135. Exit.Dor.1a
  136. Exit.Dor.2
  137. UserFn
  138. UserLP
  139. Time[    
  140.     Time.Left
  141. CommOnlyq
  142. Page"    
  143.     Page.Bell
  144. Caller
  145. Caller.Alarm$
  146. SysopD    
  147. Sysop.Next
  148. Hang8    
  149. Hang.Up
  150. User.Record]
  151. Network
  152. Table
  153. Display
  154. Display.Toggle
  155. Printer^
  156. Printer.Toggle
  157. BusyFlag4
  158. UserFilet    
  159. Parity4
  160. Filter
  161. BusyFile
  162. TimeCredP    
  163. SysFirst
  164. SysLast|    
  165. Last.Clr.Used
  166. EchoKey
  167. No.Enter.Send-
  168. Exit.Dor.Clr1?
  169. Exit.Dor.Clr2
  170. HotKey
  171. File.Missing
  172. BBSTypeT
  173. Blackj
  174. Green
  175. Magenta
  176. Brown
  177. White
  178. Grayt
  179. HiBlueJ
  180. HiGreen
  181. HiCyan
  182. HiRed~
  183.     HiMagenta^
  184. Yellow
  185. HiWhite
  186. TabSpace
  187. Blink
  188. Normal
  189.     Underline
  190.     BlinkText
  191. UnderlineText    
  192. Not.Around&
  193. Param;
  194.     DATABLOCK
  195.     CityState
  196. Password
  197. BusinessPhone
  198. VoicePhoneB
  199. LastDateOn
  200. LastTimeOn
  201. ExpertModez
  202. ProtocolTypeW
  203. LastDirListing
  204. SecurityLevel
  205. TimesOn
  206. PageLength
  207. TotalUploads
  208. TotalDownloadsH
  209. DailyDownloadBytes
  210. UserComment
  211. SysopCommentI
  212. ElapsedTimee
  213. Subcription
  214. SubcriptionExpireV
  215. AreaRegistration
  216. AreaExpire
  217. AreasToScan{
  218. TotalDownloadBytese
  219. TotalUploadBytess
  220. DeleteFlagB
  221. TimeEnteredDoor
  222. AreaFromP
  223. MemorizedMessage
  224. TimeCalled
  225. DailyDownloadTotal
  226. MaxDownloadLimitl
  227. LastRead)
  228. MaxDownloadKLimit
  229. ExpirationDate
  230. LR16    
  231. LR19!
  232. LR20)
  233. LR211
  234. LR229
  235. LR23A
  236. LR24I
  237. LR25Q
  238. LR26Y
  239. LR27a
  240. LR28i
  241. LR32q
  242.     UserBlock
  243. NMALLOC
  244. JDate
  245. Counter
  246. Hot.Key
  247. HSNEXT
  248. DOORSORC.INT'
  249.  PCBoard only
  250.  Wildcat and PCBoard only
  251.  Wildcat onlyd
  252.  Wildcat onlyd
  253.  Wildcat onlyd
  254.  Wildcat, PCBoard, and GAP only
  255.  GAP onlyC
  256.  Last read pointers for PCBoard only
  257.  Door Source  - Copyrighted 1988,1989, 1990 - Written by Todd Miller
  258.  Version 3.2  - Computer City, USA
  259.  ALL OR ANY MODIFCATIONS TO THIS PART OF DOOR SOURCE OR ANY OTHERl
  260.  PART OF DOOR SOURCE WILL RESULT IN MAJOR UNCORRECTABLE BUGS!T
  261.  Door Source 3.2 init completed!
  262. COMPRESS.INT'
  263.   COMPRESS.BAS - Door Source 3.2 utility - This should not be modified
  264.  in any way, but used as a seperate module compiled in
  265.  your door program.e
  266.  Copyrighted Computer City, USA 1991
  267. CompressHighScores
  268. WORK.FILm
  269.  Now copy the workfile over to the real file
  270. WORK.FIL
  271. ConvertJulian
  272.